home *** CD-ROM | disk | FTP | other *** search
/ Tiger Disk 15 / Tiger_Disk_015_19xx_Tiger-Crew-Disk_de_Side_A.d64 / musik-datei / musik-datei .a7ae (.txt)
Encoding:
Commodore BASIC  |  1990-01-01  |  10.4 KB  |  449 lines
  1. 6 poke53280,2:poke53281,12:poke646,1
  2. 9 open 3,0
  3. 10 print"[147]";"[144]":print
  4. 11 print"                                     [146]"
  5. 12 print"    >>>  datei fuer tontraeger  <<<  [146]"
  6. 20 print"    -------------------------------  [146]"
  7. 30 print"                                     [146]"
  8. 50 print"    verbesserte version von mephisto [146]"
  9. 84 print"                                     [146]":print
  10. 85 print"zur beachtung: bei der eingabe keine"
  11. 86 print"doppelpunkte (:) oder kommatas (,) ein-"
  12. 87 print"geben. ggf. fragezeichen benutzen !"
  13. 88 print"zwischen den eingaben trennstrich (/)   setzen !":print
  14. 90 poke198,0:wait198,1:poke198,0
  15. 100 goto182
  16. 105 :
  17. 110 print" es muessen daten eingelesen werden!":print:print
  18. 120 print" datendiskette einlegen!":print:print
  19. 140 print" ausfuehrung mit '*'-taste bestaetigen!":print:print
  20. 150 geta$
  21. 160 ifa$="*"then180
  22. 170 goto150
  23. 182 print"                                      [146]"
  24. 184 print"        daten werden eingelesen       [146]"
  25. 186 print"                                      [146]"
  26. 190 dimb$(160,3):al=0:ee=1
  27. 192 open15,8,15
  28. 193 open2,8,2,"i,s,r"
  29. 194 input#15,f1,f$,f2,f3
  30. 196 if f1=0 then 200
  31. 197 print"[147]";" probleme mit dem diskettenlaufwerk!!":print:printf1;f$;f2;f3
  32. 198 print:print" laufwerk ueberpruefen und programm":print:print" neu starten!"
  33. 199 close15:stop
  34. 200 open1,8,3,"lp,s,r"
  35. 202 input#2,i
  36. 204 close2
  37. 208 fore=0toi
  38. 212 input#1,b$(e,0),b$(e,1),b$(e,2),b$(e,3)
  39. 216 nexte
  40. 218 close1
  41. 320 print"[147]":print:print
  42. 330 print" es wurden ";i;" datensaetze eingelesen."
  43. 340 for w=1to999:nextw:if ee=0 then dim b$(160,3):al=0:open3,0
  44. 345 :
  45. 350 print"[147]";:poke650,0
  46. 360 printspc(10)"[176][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][174]"
  47. 370 printspc(10)"[194]                   [194]"
  48. 380 printspc(10)"[194]  kassetten-datei  [194]"
  49. 390 printspc(10)"[194]  ---------------[144]  [194]"
  50. 395 printspc(10)"[194]                   [194]"
  51. 400 printspc(10)"[173][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][189]":print:print
  52. 410 printspc(15)"hauptmenue[155]"
  53. 415 printspc(15)"[158][162][162][162][162][162][162][162][162][162][162][144]"
  54. 420 printspc(5)"[213][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][195][195][195][192][192][192][201]"
  55. 430 printspc(5)"[221]";spc(29)"[221]"
  56. 440 printspc(5)"[194]     [144]f1[146]  musik suchen        [221]"
  57. 450 printspc(5)"[221]";spc(29)"[221]"
  58. 460 printspc(5)"[194]     [144]f3[146]  eingaben            [221]"
  59. 470 printspc(5)"[221]";spc(29)"[221]"
  60. 480 printspc(5)"[194]     [144]f5[146]  liste auf monitor   [221]"
  61. 485 printspc(5)"[194]     [144]f6[146]  liste auf drucker   [221]"
  62. 490 printspc(5)"[221]";spc(29)"[221]"              "
  63. 500 [153][166]5)"peek     stopf7wait  ende                (NULL)"
  64. 510 [153][166]5)"(NULL)";[166]29)"(NULL)"
  65. 512 [153][166]5)"peek     stopf2wait  vorschlag           (NULL)"
  66. 514 [153][166]5)"(NULL)";[166]29)"(NULL)"
  67. 520 [153][166]5)"mid$lenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlen(NULL)"
  68. 530 [161]a$
  69. 540 [139]a$[178][199](133)[167]3000
  70. 550 [139]a$[178][199](134)[167]2000
  71. 560 [139]a$[178][199](135)[167]1000
  72. 570 [139]a$[178][199](136)[167]4000
  73. 572 [139]a$[178][199](137)[167]8000
  74. 575 [139]a$[178][199](139)[167]9000
  75. 580 [137]530
  76. 590 :
  77. 600 :
  78. 1000 [153]"load":z[178]i[170]5:[151]650,128
  79. 1001 [139]al[178]0[167]1090
  80. 1002 [141]1004:[137]1090
  81. 1004 [153]"vorher alphabetisch sortieren (j/n)?"
  82. 1005 [161]aa$:[139]aa$[178]"j"[167]1010
  83. 1006 [139]aa$[178]"n"[167][142]
  84. 1007 [137]1005
  85. 1008 [153]"                                       wait"
  86. 1009 [153]"         daten werden sortiert         wait"
  87. 1010 [153]"                                       wait"
  88. 1011 [129]f[178]0[164]i[171]2
  89. 1020 [129]y[178]f[170]1[164]i[171]1
  90. 1030 [139]b$(f,0)[179][178]b$(y,0)[167]1070
  91. 1040 b$(z,0)[178]b$(f,0):b$(z,1)[178]b$(f,1):b$(z,2)[178]b$(f,2):b$(z,3)[178]b$(f,3)
  92. 1050 b$(f,0)[178]b$(y,0):b$(f,1)[178]b$(y,1):b$(f,2)[178]b$(y,2):b$(f,3)[178]b$(y,3)
  93. 1060 b$(y,0)[178]b$(z,0):b$(y,1)[178]b$(z,1):b$(y,2)[178]b$(z,2):b$(y,3)[178]b$(z,3)
  94. 1070 [130]y
  95. 1080 [130]f:[142]
  96. 1090 [153]"load"
  97. 1100 [153]"  alphabethisch wait":zz[178]0
  98. 1105 [129]f[178]0[164]i[171]1
  99. 1110 [153]" --------------------------------------"
  100. 1120 zz[178]zz[170]1:[153][163]1)b$(f,0)
  101. 1130 zz[178]zz[170]1:[153]" (NULL):";b$(f,1)
  102. 1140 [139]f[178]i[171]1[167]1250
  103. 1142 [139]zz[179][177]12[167]1158
  104. 1144 [153]" --------------------------------------":[153]
  105. 1146 [153]"  return wait weiter     space wait hauptmenue"
  106. 1148 [161]a$
  107. 1150 [139]a$[178][199](32)[167]350
  108. 1152 [139]a$[178][199](13)[167]1156
  109. 1154 [137]1148
  110. 1156 [153]"load":[153]"  alphabethisch wait":zz[178]0
  111. 1158 [130]f
  112. 1250 [153]" --------------------------------------"
  113. 1260 [153]"     keine weiteren daten vorhanden    wait":[153]
  114. 1265 [153]"  return wait nochmal    space wait hauptmenue"
  115. 1270 [161]a$
  116. 1280 [139]a$[178][199](32)[167]350
  117. 1285 [139]a$[178][199](13)[167]1090
  118. 1290 [137]1270
  119. 2000 [153]"load"
  120. 2010 [153]"  musik eingeben wait":[153]:[153]
  121. 2020 [153]" interpret/titel:wait  _ = eingabe beenden wait"
  122. 2030 [153]
  123. 2040 [153]"";:[132]3,b$(i,0):b$(i,0)[178][200](b$(i,0),70)
  124. 2041 [153]"":al[178]1
  125. 2042 [139]b$(i,0)[178]"_"[167][153]:[153]" eingabe beendetwait":[129]w[178]1[164]1000:[130]:[137]350
  126. 2045 [139]b$(i,0)[178]""[167]b$(i,0)[178]"-"
  127. 2050 [153]" tontraeger:wait"
  128. 2060 [153]
  129. 2070 [153]"";:[132]3,b$(i,1):b$(i,1)[178][200](b$(i,1),12)
  130. 2071 [153]""
  131. 2075 [139]b$(i,1)[178]""[167]b$(i,1)[178]"-"
  132. 2080 [153]" musikrichtung:wait"
  133. 2090 [153]
  134. 2100 [153]"";:[132]3,b$(i,2):b$(i,2)[178][200](b$(i,2),20):[153]""
  135. 2105 [139]b$(i,2)[178]""[167]b$(i,2)[178]"-"
  136. 2110 [153]" erscheinungsjahr/spieldauer :wait"
  137. 2120 [153]
  138. 2130 [153]"";:[132]3,b$(i,3):b$(i,3)[178][200](b$(i,3),15)
  139. 2132 [139]b$(i,3)[178]""[167]b$(i,3)[178]"-"
  140. 2135 i[178]i[170]1
  141. 2140 [139]i[177]160[167]2170
  142. 2145 [153]"load"
  143. 2147 [137]2010
  144. 2160 [137]350
  145. 2170 [153]"load"
  146. 2180 [153]" die maximale anzahl von datensaetzen":[153]
  147. 2190 [153]" ist erreicht! (300)":[153]:[153]
  148. 2200 [153]" es koennen keine weiteren daten ein-":[153]
  149. 2210 [153]" gegeben werden!":[153]:[153]:[153]:[153]
  150. 2220 [153]" spacewait  hauptmenue"
  151. 2230 [161]a$
  152. 2240 [139]a$[178][199](32)[167]350
  153. 2250 [137]2230
  154. 2900 :
  155. 3000 [153]"load":[151]650,128
  156. 3010 [153]"  musik suchen wait":[153]:[153]
  157. 3020 [153]" wonach soll gesucht werden?":[153]
  158. 3030 [153][166]5)"f2wait  interpret/titel":[153]
  159. 3040 [153][166]5)"f4wait  tontraegerart":[153]
  160. 3050 [153][166]5)"f6wait  musikrichtung":[153]
  161. 3060 [153][166]5)"f8wait  jahr/spieldauer"
  162. 3070 [161]a$
  163. 3080 [139]a$[178][199](137)[167]3130
  164. 3090 [139]a$[178][199](138)[167]6110
  165. 3100 [139]a$[178][199](139)[167]6220
  166. 3110 [139]a$[178][199](140)[167]7000
  167. 3120 [137]3070
  168. 3130 [153]"load"
  169. 3140 [153]"  nach interpret suchen wait":[153]:[153]:df[178]0
  170. 3150 [153]" interpret:wait"
  171. 3160 [153]
  172. 3170 [153]"";:[132]3,c$
  173. 3180 [153]"load"
  174. 3190 [129]f[178]0[164]i
  175. 3200 [139]c$[178][200](b$(f,0),[195](c$))[167]3220
  176. 3205 [139]f[177][178]i[167]3360
  177. 3210 [130]f
  178. 3220 [141]5000
  179. 3230 [161]a$
  180. 3240 [139]a$[178]"1"[167][153]"load":[137]3300
  181. 3250 [139]a$[178]"2"[167]3000
  182. 3260 [139]a$[178]"3"[167]350
  183. 3270 [139]a$[178]"4"[167]3390
  184. 3280 [139]a$[178]"5"[167]6000
  185. 3290 [137]3230
  186. 3300 f[178]f[170]1
  187. 3310 [139]c$[178][200](b$(f,df),[195](c$))[167]3340
  188. 3320 [139]f[177][178]i[167]3360
  189. 3330 [137]3300
  190. 3340 [141]5000
  191. 3350 [137]3230
  192. 3360 [153]"load"
  193. 3370 [153]"                                       wait"
  194. 3372 [153]"       datensatz nicht vorhanden       wait"
  195. 3374 [153]"                                       wait"
  196. 3380 [129]w[178]1[164]999:[130]w:[137]350
  197. 3385 :
  198. 3390 [153]"load"
  199. 3400 [153]"  datensatz aendern wait":[153]:[153]
  200. 3410 [153]" was soll geaendert werden?":[153]:[153]
  201. 3420 [153][166]5)"6wait  interpret/titel":[153]
  202. 3430 [153][166]5)"7wait  tontraegerart":[153]
  203. 3440 [153][166]5)"8wait  musikrichtung":[153]
  204. 3450 [153][166]5)"9wait  jahr/dauer":[153]:[153]:[153]
  205. 3455 [153][166]5)"0wait  hauptmenue"
  206. 3460 [161]a$
  207. 3470 [139]a$[178]"6"[167]3515
  208. 3480 [139]a$[178]"7"[167]3610
  209. 3490 [139]a$[178]"8"[167]3710
  210. 3500 [139]a$[178]"9"[167]3810
  211. 3505 [139]a$[178]"0"[167]350
  212. 3510 [137]3460
  213. 3515 [153]"load"
  214. 3520 [153]" interpret/titel:wait"
  215. 3530 [153]
  216. 3540 [153][163]1)b$(f,0):[153]
  217. 3550 [153]" zu aendern in:wait"
  218. 3560 [153]
  219. 3570 [153]"";:[132]3,d$
  220. 3575 [139]d$[178]""[167]d$[178]"-"
  221. 3580 b$(f,0)[178]d$:al[178]1
  222. 3590 [141]5000
  223. 3600 [137]3230
  224. 3610 [153]"load"
  225. 3620 [153]" tontraegerart:wait"
  226. 3630 [153]
  227. 3640 [153][163]1)b$(f,1):[153]
  228. 3650 [153]" zu aendern in:wait"
  229. 3660 [153]
  230. 3670 [153]"";:[132]3,d$
  231. 3675 [139]d$[178]""[167]d$[178]"-"
  232. 3680 b$(f,1)[178]d$:al[178]1
  233. 3690 [141]5000
  234. 3700 [137]3230
  235. 3710 [153]"load"
  236. 3720 [153]" musikrichtung:wait"
  237. 3730 [153]
  238. 3740 [153][163]1)b$(f,2):[153]
  239. 3750 [153]" zu aendern in:wait"
  240. 3760 [153]
  241. 3770 [153]"";:[132]3,d$
  242. 3775 [139]d$[178]""[167]d$[178]"-"
  243. 3780 b$(f,2)[178]d$:al[178]1
  244. 3790 [141]5000
  245. 3800 [137]3230
  246. 3810 [153]"load"
  247. 3820 [153]" jahr/dauer:wait"
  248. 3830 [153]
  249. 3840 [153][163]1)b$(f,3):[153]
  250. 3850 [153]" zu aendern in:wait"
  251. 3860 [153]
  252. 3870 [153]"";:[132]3,d$
  253. 3875 [139]d$[178]""[167]d$[178]"-"
  254. 3880 b$(f,3)[178]d$:al[178]1
  255. 3890 [141]5000
  256. 3900 [137]3230
  257. 4000 [153]"load"
  258. 4003 :
  259. 4005 [139]al[178]1[167]4100
  260. 4007 [139]al[178]0[167]4570
  261. 4080 [139]a$[178]"n"[167]4570
  262. 4100 [137]4182
  263. 4110 [153]"load":[153]" daten muessen neu gespeichert werden!":[153]:[153]
  264. 4120 [153]" datendiskette einlegen!":[153]:[153]
  265. 4140 [153]" ausfuehrung mit '*'-taste bestaetigen!"
  266. 4150 [161]a$
  267. 4160 [139]a$[178]"*"[167]4180
  268. 4170 [137]4150
  269. 4180 [153]"load"
  270. 4182 [153]"                                       wait"
  271. 4184 [153]"        daten werden gespeichert       wait"
  272. 4186 [153]"                                       wait"
  273. 4188 [159]1,8,15,"s:i":[160]1
  274. 4190 [159]2,8,2,"i,s,w"
  275. 4200 [152]2,i
  276. 4205 [160]2
  277. 4206 [159]1,8,15,"s:lp":[160]1
  278. 4207 [159]1,8,2,"lp,s,w"
  279. 4210 [129]e[178]0[164]i
  280. 4214 [152]1,b$(e,0)","b$(e,1)","b$(e,2)","b$(e,3)
  281. 4218 [130]e
  282. 4220 [160]1:[160]3
  283. 4230 [160]15
  284. 4300 [153]"load"
  285. 4301 [153]" es wurden ";i;" datensaetze gespeichert":[153]:[153]
  286. 4310 [153]" soll eine sicherungs-kopie erstellt":[153]
  287. 4320 [153]" werden?    (j/n)"
  288. 4330 [161]a$
  289. 4340 [139]a$[178]"j"[167]4370
  290. 4350 [139]a$[178]"n"[167]4570
  291. 4360 [137]4330
  292. 4370 [153]"load"
  293. 4380 [153]"  sicherungs-kopie erstellen wait":[153]:[153]
  294. 4390 [153]" andere datendiskette einlegen!":[153]:[153]
  295. 4410 [153]" ausfuehrung mit '*'-taste bestaetigen!"
  296. 4420 [161]a$
  297. 4430 [139]a$[178]"*"[167] 4450
  298. 4440 [137]4420
  299. 4450 [153]"load"
  300. 4452 [153]"                                     wait"
  301. 4454 [153]"    sicherungskopie wird erstellt    wait"
  302. 4456 [153]"                                     wait"
  303. 4457 [159]1,8,15,"s:i":[160]1
  304. 4460 [159]2,8,2,"i,s,w"
  305. 4462 [152]2,i
  306. 4464 [160]2
  307. 4465 [159]1,8,15,"s:lp":[160]1
  308. 4466 [159]1,8,2,"lp,s,w"
  309. 4468 [129]e[178]0 [164] i
  310. 4472 [152]1,b$(e,0)","b$(e,1)","b$(e,2)","b$(e,3)
  311. 4476 [130]e
  312. 4478 [160]1
  313. 4570 [153]"load"
  314. 4580 [153]"                                       wait"
  315. 4590 [153]"       die benutzung ist beendet       wait"
  316. 4600 [153]"                                       wait"
  317. 4610 [129]w[178]1[164]999:[130]w
  318. 4620 [151]788,49:[151]792,71:[151]53280,14
  319. 4640 [151]53281,6:[158] 58253
  320. 4700 :
  321. 5000 [153]"load"
  322. 5010 [153]"  musik gefunden wait":[153]
  323. 5020 [153]" interpret/titel:wait                      "
  324. 5030 [153]
  325. 5040 [153][163]1)b$(f,0):[153]
  326. 5050 [153]" tontraegerart:wait                        "
  327. 5060 [153]
  328. 5070 [153][163]1)b$(f,1):[153]
  329. 5080 [153]" musikrichtung:wait                        "
  330. 5090 [153]
  331. 5100 [153][163]1)b$(f,2):[153]
  332. 5110 [153]" jahr/dauer:wait                           "
  333. 5120 [153]
  334. 5130 [153][163]1)b$(f,3):[153]
  335. 5140 [153]" ======================================"
  336. 5150 [153]" 1wait weiter   2wait andere musik3wait hauptmenue":[153]
  337. 5160 [153]" 4wait daten aendern  5wait datensatz loeschen"
  338. 5165 [153]" ======================================"
  339. 5170 [142]
  340. 5900 :
  341. 6000 [153]"load"
  342. 6002 [153][163]4)" datensatz komplett loeschenclose?"
  343. 6004 [153][163]15)"tab(tab(tab(tab(tab(tab(tab(tab(":[153]
  344. 6006 [153][163]4)" (j/n)"
  345. 6008 [161]a$
  346. 6010 [139]a$[178]"j"[167]6020
  347. 6012 [139]a$[178]"n"[167]6016
  348. 6014 [137]6008
  349. 6016 [141]5000
  350. 6018 [137]3230
  351. 6020 [153]"load"
  352. 6022 [153]"                                       wait"
  353. 6024 [153]"    datensatz wird komplett geloescht  wait"
  354. 6026 [153]"                                       wait"
  355. 6028 [129]w[178]1[164]999:[130]w
  356. 6030 [129]g[178]f[164]i
  357. 6040 h[178]g[170]1
  358. 6050 b$(g,0)[178]b$(h,0)
  359. 6060 b$(g,1)[178]b$(h,1)
  360. 6070 b$(g,2)[178]b$(h,2)
  361. 6080 b$(g,3)[178]b$(h,3)
  362. 6090 [130]g
  363. 6095 i[178]i[171]1:al[178]1
  364. 6100 [137]350
  365. 6110 [153]"load"
  366. 6120 [153]"  nach tontraeger suchen wait":[153]:[153]:df[178]1
  367. 6130 [153]" tontraeger:wait"
  368. 6140 [153]
  369. 6150 [153]"";:[132]3,c$
  370. 6160 [153]"load"
  371. 6170 [129]f[178]0[164]i
  372. 6180 [139]c$[178][200](b$(f,1),[195](c$))[167]6200
  373. 6185 [139]f[177][178]i[167]3360
  374. 6190 [130]f
  375. 6200 [141]5000
  376. 6210 [137]3230
  377. 6220 [153]"load"
  378. 6230 [153] "  nach musikrichtung suchen wait":[153]:[153]:df[178]2
  379. 6240 [153] " wonach soll gesucht werden?":[153]:[153]
  380. 6250 [153][163]6)"hard            heavy":[153]
  381. 6260 [153][163]6)"punk            pop":[153]
  382. 6270 [153][163]6)"indi            oldie":[153]
  383. 6280 [153][163]6)"                   ":[153]:[153]
  384. 6290 [153]" oder andere richtung eingeben.":[153]:[153]
  385. 6295 [153]" art:wait":[153]
  386. 6300 [153]"";:[132]3,c$
  387. 6310 [129]f[178]0[164]i
  388. 6320 [139]c$[178][200](b$(f,2),[195](c$))[167]6350
  389. 6330 [139]f[177][178]i[167]3360
  390. 6340 [130]f
  391. 6350 [141]5000
  392. 6360 [137]3230
  393. 7000 [153]"load"
  394. 7002 [153]"  nach jahr suchen wait":[153]:[153]:df[178]3
  395. 7060 [153]" jahr:wait"
  396. 7070 [153]
  397. 7080 [153]"";:[132]3,c$
  398. 7085 [153]"load"
  399. 7170 [129]f[178]0[164]i
  400. 7180 [139]c$[178][200](b$(f,3),[195](c$))[167]7200
  401. 7185 [139]f[177][178]i[167]3360
  402. 7190 [130]f
  403. 7200 [141]5000
  404. 7210 [137]3230
  405. 8000 [153]"load"
  406. 8010 zf[178][181]([187](x)[172]i)
  407. 8020 [153]"  musik-vorschlag wait":[153]:[153]
  408. 8030 [153]" interpret:wait":[153]
  409. 8040 [153][163]1)b$(zf,0):[153]
  410. 8050 [153]" tontraegerart:wait":[153]
  411. 8060 [153][163]1)b$(zf,1):[153]
  412. 8070 [153]" musikrichtung:wait":[153]
  413. 8080 [153][163]1)b$(zf,2):[153]
  414. 8090 [153]" jahr/dauer:wait":[153]
  415. 8100 [153][163]1)b$(zf,3):[153]
  416. 8110 [153]" usrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusrusr"
  417. 8120 [153]"  return wait  anderer vorschlag":[153]
  418. 8130 [153]"  space wait   hauptmenue"
  419. 8150 [161]a$
  420. 8160 [139]a$[178][199](13)[167]8000
  421. 8170 [139]a$[178][199](32)[167]350
  422. 8180 [137]8150
  423. 9000 [153]"loadkeine panik, das dauert !":z[178]i[170]5:[151]650,128:o[178]1:[159]4,4
  424. 9001 [139]al[178]0[167]9100
  425. 9002 [141]1004:[137]9100
  426. 9100 [152]4,"      tontragerliste von:"
  427. 9103 [152]4,"      ---------------------------------------------------------"
  428. 9104 [152]4,
  429. 9105 [129]f[178]0[164]i[171]1
  430. 9110 [139]o[177][195](b$(f,0))[167]e1$[178]b$(f,0):[137]9122
  431. 9112 [139][198]([202](b$(f,0),o,1))[179][177]47[167]o[178]o[170]1:[137]9110
  432. 9113 e1$[178][200](b$(f,0),o[171]1):e2$[178][201](b$(f,0),[195](b$(f,0))[171]o)
  433. 9120 m1[178][195](e1$)
  434. 9121 br$[178]"":[129]br[178]36[164]m1[169][171]1:br$[178]br$[170]" ":[130]:e1$[178]e1$[170]br$
  435. 9122 [152]4,"      "e1$;e2$:o[178]1
  436. 9125 m1[178][195](b$(f,1)):m2[178][195](b$(f,2)):m3[178][195](b$(f,3))
  437. 9128 br$[178]"":[129]br[178]15[164]m1[169][171]1:br$[178]br$[170]" ":[130]:e$[178]b$(f,1)[170]br$
  438. 9129 br$[178]"":[129]br[178]20[164]m2[169][171]1:br$[178]br$[170]" ":[130]:e$[178]e$[170]b$(f,2)[170]br$
  439. 9130 [139]o[177][195](b$(f,3))[167]e1$[178]b$(f,3):[137]9139
  440. 9131 [139][198]([202](b$(f,3),o,1))[179][177]47[167]o[178]o[170]1:[137]9130
  441. 9132 e1$[178][200](b$(f,3),o[171]1):e2$[178][201](b$(f,3),[195](b$(f,3))[171]o)
  442. 9133 m1[178][195](e1$)
  443. 9134 br$[178]"":[129]br[178]4[164]m1[169][171]1:br$[178]br$[170]" ":[130]:e1$[178]e1$[170]br$
  444. 9135 e$[178]e$[170]e1$[170]"     "[170]e2$
  445. 9139 [152]4,"      "e$:o[178]1
  446. 9140 [152]4
  447. 9158 [130]f:[160]4
  448. 9290 [137]350
  449.